BBS in a Box 11

home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 11 / AMUG BBS in a Box Volume XI (April 1994) (MacWizards).iso / Files / Prog / B-C / C++Source Code Fmtr.sit / Src / DFile.cp < prev next >
MacBinary | 1992-04-27 | 2.5 KB | [TEXT/MPS ]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: DFile.cp
Confidence	Program	Detection	Match Type	Support
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	MS-DOS Code Page Info `(other/dosCodePage)`	ext	Unsupported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, Mon Apr 27 20:13:18 1992, modified Mon Apr 27 20:13:18 1992, creator 'MPS ', type ASCII, 1714 bytes "DFile.cp" , at 0x732 566 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[MPS ]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 08 44 46 69 6c 65 2e | 63 70 00 00 00 00 00 00 |..DFile.|cp......|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 00 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 06 b2 00 | 00 02 36 a6 22 49 1e a6 |........|..6."I..|
|00000060| 22 49 1e 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |"I......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 e8 16 00 00 |........|........|
|00000080| 23 69 66 6e 64 65 66 20 | 5f 5f 43 44 45 4e 54 5f |#ifndef |__CDENT_|
|00000090| 5f 0d 23 69 6e 63 6c 75 | 64 65 20 22 63 64 65 6e |_.#inclu|de "cden|
|000000a0| 74 2e 68 22 0d 23 65 6e | 64 69 66 0d 0d 23 69 66 |t.h".#en|dif..#if|
|000000b0| 6e 64 65 66 20 5f 5f 44 | 46 49 4c 45 5f 5f 0d 23 |ndef __D|FILE__.#|
|000000c0| 69 6e 63 6c 75 64 65 20 | 22 44 46 69 6c 65 2e 68 |include |"DFile.h|
|000000d0| 22 0d 23 65 6e 64 69 66 | 0d 0d 23 69 66 6e 64 65 |".#endif|..#ifnde|
|000000e0| 66 20 5f 5f 53 54 52 49 | 4e 47 5f 5f 0d 23 69 6e |f __STRI|NG__.#in|
|000000f0| 63 6c 75 64 65 20 3c 73 | 74 72 69 6e 67 2e 68 3e |clude <s|tring.h>|
|00000100| 0d 23 65 6e 64 69 66 0d | 0d 0d 0d 2f 2f b5 20 20 |.#endif.|...//.  |
|00000110| 20 44 46 69 6c 65 3a 3a | 49 44 46 69 6c 65 0d 23 | DFile::|IDFile.#|
|00000120| 70 72 61 67 6d 61 20 73 | 65 67 6d 65 6e 74 20 44 |pragma s|egment D|
|00000130| 46 69 6c 65 0d 73 68 6f | 72 74 20 44 46 69 6c 65 |File.sho|rt DFile|
|00000140| 3a 3a 49 44 46 69 6c 65 | 28 63 6f 6e 73 74 20 44 |::IDFile|(const D|
|00000150| 46 69 6c 65 20 2a 61 6e | 41 72 65 61 29 0d 7b 0d |File *an|Area).{.|
|00000160| 09 66 4f 75 74 70 75 74 | 20 3d 20 61 6e 41 72 65 |.fOutput| = anAre|
|00000170| 61 2d 3e 66 4f 75 74 70 | 75 74 3b 0d 09 72 65 74 |a->fOutp|ut;..ret|
|00000180| 75 72 6e 20 28 49 44 61 | 74 61 41 72 65 61 28 61 |urn (IDa|taArea(a|
|00000190| 6e 41 72 65 61 29 29 3b | 0d 7d 0d 0d 0d 2f 2f b5 |nArea));|.}...//.|
|000001a0| 20 20 20 44 46 69 6c 65 | 3a 3a 53 65 74 4f 75 74 |   DFile|::SetOut|
|000001b0| 70 75 74 0d 23 70 72 61 | 67 6d 61 20 73 65 67 6d |put.#pra|gma segm|
|000001c0| 65 6e 74 20 44 46 69 6c | 65 0d 76 6f 69 64 20 44 |ent DFil|e.void D|
|000001d0| 46 69 6c 65 3a 3a 53 65 | 74 4f 75 74 70 75 74 28 |File::Se|tOutput(|
|000001e0| 53 74 64 46 69 6c 65 20 | 2a 61 6e 4f 75 74 70 75 |StdFile |*anOutpu|
|000001f0| 74 29 0d 7b 0d 09 2f 2f | 20 49 66 20 63 68 61 6e |t).{..//| If chan|
|00000200| 67 69 6e 67 20 66 69 6c | 65 73 2c 20 77 72 69 74 |ging fil|es, writ|
|00000210| 65 20 74 68 65 20 64 61 | 74 61 20 74 68 61 74 27 |e the da|ta that'|
|00000220| 73 20 61 63 63 75 6d 75 | 6c 61 74 65 64 20 73 6f |s accumu|lated so|
|00000230| 20 66 61 72 20 69 6e 74 | 6f 20 74 68 65 0d 09 2f | far int|o the../|
|00000240| 2f 20 67 69 76 65 6e 20 | 6f 75 74 70 75 74 20 66 |/ given |output f|
|00000250| 69 6c 65 2e 0d 09 69 66 | 20 28 66 4f 75 74 70 75 |ile...if| (fOutpu|
|00000260| 74 20 21 3d 20 61 6e 4f | 75 74 70 75 74 20 26 26 |t != anO|utput &&|
|00000270| 20 66 4f 75 74 70 75 74 | 20 21 3d 20 30 29 0d 09 | fOutput| != 0)..|
|00000280| 09 46 6c 75 73 68 28 29 | 3b 0d 09 66 4f 75 74 70 |.Flush()|;..fOutp|
|00000290| 75 74 20 3d 20 61 6e 4f | 75 74 70 75 74 3b 0d 7d |ut = anO|utput;.}|
|000002a0| 0d 0d 0d 2f 2f b5 20 20 | 20 44 46 69 6c 65 3a 3a |...//.  | DFile::|
|000002b0| 50 75 74 63 0d 23 70 72 | 61 67 6d 61 20 73 65 67 |Putc.#pr|agma seg|
|000002c0| 6d 65 6e 74 20 44 46 69 | 6c 65 0d 76 6f 69 64 20 |ment DFi|le.void |
|000002d0| 44 46 69 6c 65 3a 3a 50 | 75 74 63 28 69 6e 74 20 |DFile::P|utc(int |
|000002e0| 61 43 68 61 72 29 0d 7b | 0d 09 63 68 61 72 20 63 |aChar).{|..char c|
|000002f0| 20 3d 20 28 63 68 61 72 | 29 61 43 68 61 72 3b 0d | = (char|)aChar;.|
|00000300| 0d 09 69 66 20 28 57 72 | 69 74 65 28 26 63 2c 20 |..if (Wr|ite(&c, |
|00000310| 73 69 7a 65 6f 66 28 63 | 68 61 72 29 29 20 21 3d |sizeof(c|har)) !=|
|00000320| 20 73 69 7a 65 6f 66 28 | 63 68 61 72 29 29 0d 09 | sizeof(|char))..|
|00000330| 09 64 69 61 67 28 6b 46 | 61 74 61 6c 2c 20 22 4f |.diag(kF|atal, "O|
|00000340| 75 74 20 6f 66 20 6d 65 | 6d 6f 72 79 20 69 6e 20 |ut of me|mory in |
|00000350| 44 46 69 6c 65 3a 3a 50 | 75 74 63 5c 6e 22 29 3b |DFile::P|utc\n");|
|00000360| 0d 7d 0d 0d 0d 2f 2f b5 | 20 20 20 44 46 69 6c 65 |.}...//.|   DFile|
|00000370| 3a 3a 50 75 74 73 0d 23 | 70 72 61 67 6d 61 20 73 |::Puts.#|pragma s|
|00000380| 65 67 6d 65 6e 74 20 44 | 46 69 6c 65 0d 76 6f 69 |egment D|File.voi|
|00000390| 64 20 44 46 69 6c 65 3a | 3a 50 75 74 73 28 63 6f |d DFile:|:Puts(co|
|000003a0| 6e 73 74 20 63 68 61 72 | 20 2a 61 53 74 72 69 6e |nst char| *aStrin|
|000003b0| 67 29 0d 7b 0d 09 69 6e | 74 20 61 4c 65 6e 20 3d |g).{..in|t aLen =|
|000003c0| 20 73 74 72 6c 65 6e 28 | 61 53 74 72 69 6e 67 29 | strlen(|aString)|
|000003d0| 3b 0d 0d 09 69 66 20 28 | 57 72 69 74 65 28 61 53 |;...if (|Write(aS|
|000003e0| 74 72 69 6e 67 2c 20 61 | 4c 65 6e 29 20 21 3d 20 |tring, a|Len) != |
|000003f0| 61 4c 65 6e 29 0d 09 09 | 64 69 61 67 28 6b 46 61 |aLen)...|diag(kFa|
|00000400| 74 61 6c 2c 20 22 4f 75 | 74 20 6f 66 20 6d 65 6d |tal, "Ou|t of mem|
|00000410| 6f 72 79 20 69 6e 20 44 | 46 69 6c 65 3a 3a 50 75 |ory in D|File::Pu|
|00000420| 74 73 5c 6e 22 29 3b 0d | 09 50 75 74 63 28 27 5c |ts\n");.|.Putc('\|
|00000430| 6e 27 29 3b 0d 7d 0d 0d | 0d 2f 2f b5 20 20 20 44 |n');.}..|.//.   D|
|00000440| 46 69 6c 65 3a 3a 46 6c | 75 73 68 0d 23 70 72 61 |File::Fl|ush.#pra|
|00000450| 67 6d 61 20 73 65 67 6d | 65 6e 74 20 44 46 69 6c |gma segm|ent DFil|
|00000460| 65 0d 73 69 7a 65 5f 74 | 20 44 46 69 6c 65 3a 3a |e.size_t| DFile::|
|00000470| 46 6c 75 73 68 28 73 69 | 7a 65 5f 74 20 61 54 68 |Flush(si|ze_t aTh|
|00000480| 72 65 73 68 6f 6c 64 29 | 0d 7b 0d 09 69 66 20 28 |reshold)|.{..if (|
|00000490| 66 4f 75 74 70 75 74 20 | 3d 3d 20 30 29 0d 09 09 |fOutput |== 0)...|
|000004a0| 72 65 74 75 72 6e 20 28 | 30 29 3b 0d 0d 09 2f 2f |return (|0);...//|
|000004b0| 20 49 66 20 74 68 65 72 | 65 20 69 73 20 6c 65 73 | If ther|e is les|
|000004c0| 73 20 64 61 74 61 20 74 | 68 61 6e 20 74 68 65 20 |s data t|han the |
|000004d0| 74 68 72 65 73 68 6f 6c | 64 2c 20 72 65 74 75 72 |threshol|d, retur|
|000004e0| 6e 20 30 2e 20 20 43 6c | 65 61 72 45 72 72 28 29 |n 0.  Cl|earErr()|
|000004f0| 20 6f 6e 0d 09 2f 2f 20 | 66 4f 75 74 70 75 74 20 | on..// |fOutput |
|00000500| 73 6f 20 74 68 61 74 20 | 61 66 74 65 72 20 63 61 |so that |after ca|
|00000510| 6c 6c 69 6e 67 20 45 72 | 72 6f 72 28 29 20 61 6e |lling Er|ror() an|
|00000520| 64 20 67 65 74 74 69 6e | 67 20 74 68 65 20 69 6e |d gettin|g the in|
|00000530| 66 6f 72 6d 61 74 69 6f | 6e 20 74 68 61 74 0d 09 |formatio|n that..|
|00000540| 2f 2f 20 6e 6f 20 65 72 | 72 6f 72 20 6f 63 63 75 |// no er|ror occu|
|00000550| 72 72 65 64 2c 20 74 68 | 65 20 63 61 6c 6c 65 72 |rred, th|e caller|
|00000560| 20 6b 6e 6f 77 73 20 74 | 68 61 74 20 6e 6f 20 64 | knows t|hat no d|
|00000570| 61 74 61 20 77 61 73 20 | 77 72 69 74 74 65 6e 20 |ata was |written |
|00000580| 62 65 63 61 75 73 65 0d | 09 2f 2f 20 74 68 65 20 |because.|.// the |
|00000590| 74 68 72 65 73 68 6f 6c | 64 20 77 61 73 20 6e 6f |threshol|d was no|
|000005a0| 74 20 72 65 61 63 68 65 | 64 2e 0d 09 69 66 20 28 |t reache|d...if (|
|000005b0| 61 54 68 72 65 73 68 6f | 6c 64 20 3e 20 47 65 74 |aThresho|ld > Get|
|000005c0| 43 75 72 73 6f 72 28 29 | 29 20 7b 0d 09 09 66 4f |Cursor()|) {...fO|
|000005d0| 75 74 70 75 74 2d 3e 43 | 6c 65 61 72 45 72 72 28 |utput->C|learErr(|
|000005e0| 29 3b 0d 09 09 72 65 74 | 75 72 6e 20 28 30 29 3b |);...ret|urn (0);|
|000005f0| 0d 09 7d 0d 0d 09 2f 2f | 20 4d 6f 76 65 20 74 68 |..}...//| Move th|
|00000600| 65 20 64 61 74 61 20 74 | 6f 20 61 20 73 61 66 65 |e data t|o a safe|
|00000610| 20 70 6c 61 63 65 20 61 | 6e 64 20 6d 61 6b 65 20 | place a|nd make |
|00000620| 73 75 72 65 20 69 74 20 | 64 6f 65 73 6e 27 74 20 |sure it |doesn't |
|00000630| 6d 6f 76 65 2e 0d 09 4d | 6f 76 65 48 48 69 28 29 |move...M|oveHHi()|
|00000640| 3b 0d 09 48 4c 6f 63 6b | 28 29 3b 0d 0d 09 2f 2f |;..HLock|();...//|
|00000650| 20 57 72 69 74 65 20 74 | 68 65 20 64 61 74 61 2e | Write t|he data.|
|00000660| 0d 09 73 69 7a 65 5f 74 | 20 61 6d 74 57 72 69 74 |..size_t| amtWrit|
|00000670| 74 65 6e 20 3d 20 66 4f | 75 74 70 75 74 2d 3e 57 |ten = fO|utput->W|
|00000680| 72 69 74 65 28 47 65 74 | 44 61 74 61 28 30 29 2c |rite(Get|Data(0),|
|00000690| 20 47 65 74 43 75 72 73 | 6f 72 28 29 29 3b 0d 0d | GetCurs|or());..|
|000006a0| 09 2f 2f 20 41 6c 6c 20 | 64 6f 6e 65 2c 20 75 6e |.// All |done, un|
|000006b0| 6c 6f 63 6b 20 74 68 65 | 20 64 61 74 61 2c 20 63 |lock the| data, c|
|000006c0| 6c 65 61 72 20 74 68 65 | 20 62 75 66 66 65 72 20 |lear the| buffer |
|000006d0| 66 6f 72 20 6d 6f 72 65 | 20 64 61 74 61 0d 09 48 |for more| data..H|
|000006e0| 55 6e 6c 6f 63 6b 28 29 | 3b 0d 09 53 65 74 43 75 |Unlock()|;..SetCu|
|000006f0| 72 73 6f 72 28 30 29 3b | 0d 0d 09 2f 2f 20 52 65 |rsor(0);|...// Re|
|00000700| 74 75 72 6e 20 74 68 65 | 20 61 6d 6f 75 6e 74 20 |turn the| amount |
|00000710| 77 72 69 74 74 65 6e 0d | 09 72 65 74 75 72 6e 20 |written.|.return |
|00000720| 28 61 6d 74 57 72 69 74 | 74 65 6e 29 3b 0d 7d 0d |(amtWrit|ten);.}.|
|00000730| 0d 0d 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000740| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000750| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000780| 00 00 01 00 00 00 01 ec | 00 00 00 ec 00 00 00 4a |........|.......J|
|00000790| 2a 20 43 68 65 63 6b 70 | 6f 69 6e 74 53 79 6e 74 |* Checkp|ointSynt|
|000007a0| 61 63 74 69 63 0d 2a 2a | 09 54 68 69 73 20 63 6c |actic.**|.This cl|
|000007b0| 08 44 46 69 6c 65 2e 63 | 70 00 02 00 00 00 50 61 |.DFile.c|p.....Pa|
|000007c0| 72 74 53 49 54 78 00 00 | 00 00 00 00 00 00 00 01 |rtSITx..|........|
|000007d0| 00 00 50 61 72 74 53 49 | 54 78 00 00 00 00 00 00 |..PartSI|Tx......|
|000007e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007f0| 00 00 a9 80 16 9c 00 00 | 00 00 00 00 02 36 6f 67 |........|.....6og|
|00000800| 0d 63 6c 61 73 73 20 43 | 68 65 63 6b 70 6f 69 6e |.class C|heckpoin|
|00000810| 74 53 79 6e 74 61 63 74 | 69 63 20 3a 20 70 75 62 |tSyntact|ic : pub|
|00000820| 6c 69 63 20 43 68 65 63 | 6b 70 6f 69 6e 74 49 74 |lic Chec|kpointIt|
|00000830| 65 6d 20 7b 0d 70 75 62 | 6c 69 63 3a 0d 09 43 68 |em {.pub|lic:..Ch|
|00000840| 65 63 6b 70 6f 69 6e 74 | 53 79 6e 74 61 63 74 69 |eckpoint|Syntacti|
|00000850| 63 28 76 6f 69 64 20 28 | 46 6f 72 6d 61 74 74 69 |c(void (|Formatti|
|00000860| 6e 67 3a 3a 2a 61 4d 65 | 74 68 6f 64 29 28 53 79 |ng::*aMe|thod)(Sy|
|00000870| 6e 74 61 63 74 69 63 2a | 29 2c 20 53 79 6e 74 61 |ntactic*|), Synta|
|00000880| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 00 00 00 |...H..Mo|naco....|
|00000890| 00 00 21 20 00 00 00 00 | 00 00 00 00 00 00 01 d4 |..! ....|........|
|000008a0| 00 01 ea 20 00 77 00 06 | 00 04 00 27 00 02 01 76 |... .w..|...'...v|
|000008b0| 01 fe 00 27 00 02 01 76 | 01 fe a6 22 02 ce 00 00 |...'...v|..."....|
|000008c0| 00 00 00 00 00 00 00 00 | 00 00 01 00 00 00 00 7a |........|.......z|
|000008d0| 00 05 00 00 00 8f 00 00 | 00 9e 0f 20 20 44 46 69 |........|...  DFi|
|000008e0| 6c 65 3a 3a 49 44 46 69 | 6c 65 00 00 01 21 00 00 |le::IDFi|le...!..|
|000008f0| 01 33 13 20 20 44 46 69 | 6c 65 3a 3a 53 65 74 4f |.3.  DFi|le::SetO|
|00000900| 75 74 70 75 74 00 00 00 | 02 27 00 00 02 34 0d 20 |utput...|.'...4. |
|00000910| 20 44 46 69 6c 65 3a 3a | 50 75 74 63 00 00 02 e9 | DFile::|Putc....|
|00000920| 00 00 02 f6 0d 20 20 44 | 46 69 6c 65 3a 3a 50 75 |.....  D|File::Pu|
|00000930| 74 73 00 00 03 bd 00 00 | 03 cb 0f 20 20 44 46 69 |ts......|...  DFi|
|00000940| 6c 65 3a 3a 46 6c 75 73 | 68 00 00 00 00 1e 00 27 |le::Flus|h......'|
|00000950| 00 02 01 76 01 fe 00 27 | 00 02 01 76 01 fe 00 00 |...v...'|...v....|
|00000960| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 01 00 |........|........|
|00000970| 00 00 01 ec 00 00 00 ec | 00 00 00 4a 01 14 17 0c |........|...J....|
|00000980| 10 2a 00 00 00 1c 00 4a | 00 00 4d 50 53 52 00 02 |.*.....J|..MPSR..|
|00000990| 00 0a 03 ed ff ff 00 00 | 00 00 00 00 00 00 03 ef |........|........|
|000009a0| ff ff 00 00 00 4c 00 00 | 00 00 03 f0 ff ff 00 00 |.....L..|........|
|000009b0| 00 ca 01 1a 3b e8 00 00 | 00 00 00 00 00 00 00 00 |....;...|........|
|000009c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000009f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+